`dominant` <-
function (o) UseMethod("dominant")

